home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
IRIX 6.2 Development Libraries
/
SGI IRIX 6.2 Development Libraries.iso
/
dist
/
complib.idb
/
usr
/
share
/
catman
/
p_man
/
cat3
/
complib
/
TRIDIB.z
/
TRIDIB
Wrap
Text File
|
1996-03-14
|
6KB
|
133 lines
____TTTTRRRRIIIIDDDDIIIIBBBB((((3333FFFF)))) ____TTTTRRRRIIIIDDDDIIIIBBBB((((3333FFFF))))
NNNNAAAAMMMMEEEE
TRIDIB, STRIDIB - EISPACK routine. This subroutine finds those
eigenvalues of a TRIDIAGONAL SYMMETRIC matrix between specified boundary
indices, using bisection.
SSSSYYYYNNNNOOOOPPPPSSSSYYYYSSSS
ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ttttrrrriiiiddddiiiibbbb((((nnnn,,,,eeeeppppssss1111,,,,dddd,,,,eeee,,,,eeee2222,,,,llllbbbb,,,,uuuubbbb,,,,mmmm11111111,,,,mmmm,,,,wwww,,,,iiiinnnndddd,,,,iiiieeeerrrrrrrr,,,,rrrrvvvv4444,,,,rrrrvvvv5555))))
iiiinnnntttteeeeggggeeeerrrr nnnn,,,, mmmm11111111,,,, mmmm,,,, iiiieeeerrrrrrrr,,,, iiiinnnndddd((((mmmm))))
ddddoooouuuubbbblllleeee pppprrrreeeecccciiiissssiiiioooonnnn eeeeppppssss1111,,,, llllbbbb,,,, uuuubbbb
ddddoooouuuubbbblllleeee pppprrrreeeecccciiiissssiiiioooonnnn dddd((((nnnn)))),,,, eeee((((nnnn)))),,,, eeee2222((((nnnn)))),,,, wwww((((mmmm)))),,,, rrrrvvvv4444((((nnnn)))),,,, rrrrvvvv5555((((nnnn))))
ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ssssttttrrrriiiiddddiiiibbbb((((nnnn,,,,eeeeppppssss1111,,,,dddd,,,,eeee,,,,eeee2222,,,,llllbbbb,,,,uuuubbbb,,,,mmmm11111111,,,,mmmm,,,,wwww,,,,iiiinnnndddd,,,,iiiieeeerrrrrrrr,,,,rrrrvvvv4444,,,,rrrrvvvv5555))))
iiiinnnntttteeeeggggeeeerrrr nnnn,,,, mmmm11111111,,,, mmmm,,,, iiiieeeerrrrrrrr,,,, iiiinnnndddd((((mmmm))))
rrrreeeeaaaallll eeeeppppssss1111,,,, llllbbbb,,,, uuuubbbb
rrrreeeeaaaallll dddd((((nnnn)))),,,, eeee((((nnnn)))),,,, eeee2222((((nnnn)))),,,, wwww((((mmmm)))),,,, rrrrvvvv4444((((nnnn)))),,,, rrrrvvvv5555((((nnnn))))
DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
On Input
NNNN is the order of the matrix.
EEEEPPPPSSSS1111 is an absolute error tolerance for the computed eigenvalues. If the
input EPS1 is non-positive, it is reset for each submatrix to a default
value, namely, minus the product of the relative machine precision and
the 1-norm of the submatrix.
DDDD contains the diagonal elements of the input matrix.
EEEE contains the subdiagonal elements of the input matrix in its last N-1
positions. E(1) is arbitrary.
EEEE2222 contains the squares of the corresponding elements of E. E2(1) is
arbitrary.
MMMM11111111 specifies the lower boundary index for the desired eigenvalues.
MMMM specifies the number of eigenvalues desired. The upper boundary index
M22 is then obtained as M22=M11+M-1. On Output
EEEEPPPPSSSS1111 is unaltered unless it has been reset to its (last) default value.
DDDD and E are unaltered. ELEMENTS of E2, corresponding to elements of E
regarded as negligible, have been replaced by zero causing the matrix to
split into a direct sum of submatrices. E2(1) is also set to zero.
LLLLBBBB and UB DEFINE an interval containing exactly the desired eigenvalues.
WWWW contains, in its first M positions, the eigenvalues between indices M11
and M22 in ascending order.
PPPPaaaaggggeeee 1111
____TTTTRRRRIIIIDDDDIIIIBBBB((((3333FFFF)))) ____TTTTRRRRIIIIDDDDIIIIBBBB((((3333FFFF))))
IIIINNNNDDDD contains in its first M positions the submatrix indices associated
with the corresponding eigenvalues in W -- 1 for eigenvalues belonging to
the first submatrix from the top, 2 for those belonging to the second
submatrix, etc.
IIIIEEEERRRRRRRR is set to Zero for normal return, 3*N+1 if multiple
eigenvalues at index M11 make
unique selection impossible, 3*N+2 if multiple eigenvalues at
index M22 make
unique selection impossible.
RRRRVVVV4444 and RV5 are temporary storage arrays. Note that subroutine TQL1,
IMTQL1, or TQLRAT is generally faster than TRIDIB, if more than N/4
eigenvalues are to be found. Questions and comments should be directed
to B. S. Garbow, APPLIED MATHEMATICS DIVISION, ARGONNE NATIONAL
LABORATORY
PPPPaaaaggggeeee 2222